home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 85 / CD-ROM 85 / CD-ROM 85.iso / med2000 / js / chamada.js < prev    next >
Encoding:
Text File  |  2001-04-19  |  897 b   |  43 lines

  1. function incluijs(arquivojs) {
  2. return '<S' + 'CRIPT language="JavaScript" SRC="' + arquivojs + '"><\/SCRIPT>';
  3.  }
  4.  
  5. var verbeteurl=location.href;
  6. verbeteurl=verbeteurl.toUpperCase();
  7.  
  8. switch (secao){
  9.  
  10.             case "geografia": // geografia
  11.  
  12.                 document.write (incluijs('/med2000/js/destaque.js'));
  13.                 // document.write (incluijs('/med2000/js/geografia.js'));
  14.                 break;
  15.  
  16.             case "geral": // geral
  17.  
  18.                 document.write (incluijs('/med2000/js/destaque.js'));
  19.                 break;
  20.  
  21.             case "vazio": // geral
  22.  
  23.                 break;
  24.     
  25.             default: // destaque principal
  26.  
  27.                 document.write (incluijs('/med2000/js/destaque.js'));
  28.                 break;
  29.                 
  30.  
  31.         }
  32.  
  33.  
  34. // se for um Estado brasileiro
  35. if (verbeteurl.search("ESTA2") != -1)
  36. document.write (incluijs('/med2000/js/estados.js'));
  37.  
  38. // se for uma doenca
  39. if (verbeteurl.search("DOEN") != -1)
  40. document.write (incluijs('/med2000/js/doenca.js'));
  41.  
  42.  
  43.